home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1997 July: Mac OS SDK / Dev.CD Jul 97 SDK1.toast / Development Kits (Disc 1) / Interfaces&Libraries / Interfaces / AIncludes / Windows.a < prev    next >
Encoding:
Text File  |  1996-01-24  |  16.2 KB  |  724 lines  |  [TEXT/MPS ]

  1. ;
  2. ;    File:        Windows.a
  3. ;
  4. ;    Contains:    Window Manager Interfaces.
  5. ;
  6. ;    Version:    Technology:    System 7.5
  7. ;                Package:    Universal Interfaces 2.2 in “MPW” on ETO #20
  8. ;
  9. ;    Copyright:    © 1984-1995 by Apple Computer, Inc.
  10. ;                All rights reserved.
  11. ;
  12. ;    Bugs?:        If you find a problem with this file, use the Apple Bug Reporter
  13. ;                stack.  Include the file and version information (from above)
  14. ;                in the problem description and send to:
  15. ;                    Internet:    apple.bugs@applelink.apple.com
  16. ;                    AppleLink:    APPLE.BUGS
  17. ;
  18. ;
  19.  
  20.     IF &TYPE('__WINDOWS__') = 'UNDEFINED' THEN
  21. __WINDOWS__ SET 1
  22.  
  23.  
  24.     IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
  25.     include 'Types.a'
  26.     ENDIF
  27. ;        include 'ConditionalMacros.a'                                ;
  28.  
  29.     IF &TYPE('__MEMORY__') = 'UNDEFINED' THEN
  30.     include 'Memory.a'
  31.     ENDIF
  32. ;        include 'MixedMode.a'                                        ;
  33.  
  34.     IF &TYPE('__QUICKDRAW__') = 'UNDEFINED' THEN
  35.     include 'Quickdraw.a'
  36.     ENDIF
  37. ;        include 'QuickdrawText.a'                                    ;
  38.  
  39.     IF &TYPE('__EVENTS__') = 'UNDEFINED' THEN
  40.     include 'Events.a'
  41.     ENDIF
  42. ;        include 'OSUtils.a'                                        ;
  43.  
  44.     IF &TYPE('__CONTROLS__') = 'UNDEFINED' THEN
  45.     include 'Controls.a'
  46.     ENDIF
  47. ;        include 'Menus.a'                                            ;
  48.  
  49. kWindowDefProcType                EQU        'WDEF'
  50.  
  51. ;####################################################################################
  52. ;
  53. ;    Window Definition ID's
  54. ;
  55. ;####################################################################################
  56. kStandardWindowDefinition        EQU        0                    ; for document windows and dialogs
  57. kRoundWindowDefinition            EQU        1                    ; old da-style window
  58. kFloatingWindowDefinition        EQU        124                    ; for floating windows
  59.  
  60. ;####################################################################################
  61. ;
  62. ; Window Variant Codes
  63. ;
  64. ;####################################################################################
  65. ; for use with kStandardWindowDefinition 
  66. kModalDialogVariantCode            EQU        1
  67. kMovableModalDialogVariantCode    EQU        5
  68. ; for use with kFloatingWindowDefinition 
  69. kSideFloaterVariantCode            EQU        8
  70.  
  71. ;####################################################################################
  72. ;
  73. ; Old-style procIDs.  For use only with New(C)Window
  74. ;
  75. ;####################################################################################
  76. documentProc                    EQU        0
  77. dBoxProc                        EQU        1
  78. plainDBox                        EQU        2
  79. altDBoxProc                        EQU        3
  80. noGrowDocProc                    EQU        4
  81. movableDBoxProc                    EQU        5
  82. zoomDocProc                        EQU        8
  83. zoomNoGrow                        EQU        12
  84. rDocProc                        EQU        16
  85. ; floating window defproc ids 
  86. floatProc                        EQU        1985
  87. floatGrowProc                    EQU        1987
  88. floatZoomProc                    EQU        1989
  89. floatZoomGrowProc                EQU        1991
  90. floatSideProc                    EQU        1993
  91. floatSideGrowProc                EQU        1995
  92. floatSideZoomProc                EQU        1997
  93. floatSideZoomGrowProc            EQU        1999
  94.  
  95. ;####################################################################################
  96. ;
  97. ; Standard window kinds
  98. ;
  99. ;####################################################################################
  100. dialogKind                        EQU        2
  101. userKind                        EQU        8
  102. kDialogWindowKind                EQU        2
  103. kApplicationWindowKind            EQU        8
  104.  
  105. ;####################################################################################
  106. ;
  107. ; FindWindow result codes
  108. ;
  109. ;####################################################################################
  110. inDesk                            EQU        0
  111. inMenuBar                        EQU        1
  112. inSysWindow                        EQU        2
  113. inContent                        EQU        3
  114. inDrag                            EQU        4
  115. inGrow                            EQU        5
  116. inGoAway                        EQU        6
  117. inZoomIn                        EQU        7
  118. inZoomOut                        EQU        8
  119.  
  120. wDraw                            EQU        0
  121. wHit                            EQU        1
  122. wCalcRgns                        EQU        2
  123. wNew                            EQU        3
  124. wDispose                        EQU        4
  125. wGrow                            EQU        5
  126. wDrawGIcon                        EQU        6
  127.  
  128. deskPatID                        EQU        16
  129.  
  130. ;####################################################################################
  131. ;
  132. ; Window Definition hit test result codes ("WindowPart")
  133. ;
  134. ;####################################################################################
  135. wNoHit                            EQU        0
  136. wInContent                        EQU        1
  137. wInDrag                            EQU        2
  138. wInGrow                            EQU        3
  139. wInGoAway                        EQU        4
  140. wInZoomIn                        EQU        5
  141. wInZoomOut                        EQU        6
  142.  
  143. ;
  144. ; pascal RgnHandle GetGrayRgn(void)
  145. ;
  146.     IF ¬ GENERATINGCFM THEN
  147.         Macro
  148.         _GetGrayRgn         &dest=(sp)
  149.         move.l               $09EE,&dest
  150.         EndM
  151.     ELSE
  152.         IMPORT_CFM_FUNCTION    GetGrayRgn
  153.     ENDIF
  154.  
  155. ;####################################################################################
  156. ;
  157. ;    Color table defined for compatibility only.  Will move to some ifdef'd wasteland.
  158. ;
  159. ;####################################################################################
  160. WinCTab                 RECORD    0
  161. wCSeed                     ds.l   1        ; offset: $0 (0)        ; reserved 
  162. wCReserved                 ds.w   1        ; offset: $4 (4)        ; reserved 
  163. ctSize                     ds.w   1        ; offset: $6 (6)        ; usually 4 for windows 
  164. ctTable                     ds.b   5 * ColorSpec.sizeof ; offset: $8 (8)
  165. sizeof                     EQU *            ; size:   $30 (48)
  166.                         ENDR
  167.  
  168. ; typedef struct WinCTab     WinCTab
  169. ; typedef WinCTab             *WCTabPtr, **WCTabHandle
  170. ;
  171. ; pascal void InitWindows(void)
  172. ;
  173.     IF ¬ GENERATINGCFM THEN
  174.         _InitWindows:    OPWORD    $A912
  175.     ELSE
  176.         IMPORT_CFM_FUNCTION    InitWindows
  177.     ENDIF
  178.  
  179. ;
  180. ; pascal void GetWMgrPort(GrafPtr *wPort)
  181. ;
  182.     IF ¬ GENERATINGCFM THEN
  183.         _GetWMgrPort:    OPWORD    $A910
  184.     ELSE
  185.         IMPORT_CFM_FUNCTION    GetWMgrPort
  186.     ENDIF
  187.  
  188. ;
  189. ; pascal WindowRef NewWindow(void *wStorage, const Rect *boundsRect, ConstStr255Param title, Boolean visible, short theProc, WindowRef behind, Boolean goAwayFlag, long refCon)
  190. ;
  191.     IF ¬ GENERATINGCFM THEN
  192.         _NewWindow:    OPWORD    $A913
  193.     ELSE
  194.         IMPORT_CFM_FUNCTION    NewWindow
  195.     ENDIF
  196.  
  197. ;
  198. ; pascal WindowRef GetNewWindow(short windowID, void *wStorage, WindowRef behind)
  199. ;
  200.     IF ¬ GENERATINGCFM THEN
  201.         _GetNewWindow:    OPWORD    $A9BD
  202.     ELSE
  203.         IMPORT_CFM_FUNCTION    GetNewWindow
  204.     ENDIF
  205.  
  206. ;
  207. ; pascal void CloseWindow(WindowRef theWindow)
  208. ;
  209.     IF ¬ GENERATINGCFM THEN
  210.         _CloseWindow:    OPWORD    $A92D
  211.     ELSE
  212.         IMPORT_CFM_FUNCTION    CloseWindow
  213.     ENDIF
  214.  
  215. ;
  216. ; pascal void DisposeWindow(WindowRef theWindow)
  217. ;
  218.     IF ¬ GENERATINGCFM THEN
  219.         _DisposeWindow:    OPWORD    $A914
  220.     ELSE
  221.         IMPORT_CFM_FUNCTION    DisposeWindow
  222.     ENDIF
  223.  
  224. ;
  225. ; pascal void GetWTitle(WindowRef theWindow, Str255 title)
  226. ;
  227.     IF ¬ GENERATINGCFM THEN
  228.         _GetWTitle:    OPWORD    $A919
  229.     ELSE
  230.         IMPORT_CFM_FUNCTION    GetWTitle
  231.     ENDIF
  232.  
  233. ;
  234. ; pascal void SelectWindow(WindowRef theWindow)
  235. ;
  236.     IF ¬ GENERATINGCFM THEN
  237.         _SelectWindow:    OPWORD    $A91F
  238.     ELSE
  239.         IMPORT_CFM_FUNCTION    SelectWindow
  240.     ENDIF
  241.  
  242. ;
  243. ; pascal void HideWindow(WindowRef theWindow)
  244. ;
  245.     IF ¬ GENERATINGCFM THEN
  246.         _HideWindow:    OPWORD    $A916
  247.     ELSE
  248.         IMPORT_CFM_FUNCTION    HideWindow
  249.     ENDIF
  250.  
  251. ;
  252. ; pascal void ShowWindow(WindowRef theWindow)
  253. ;
  254.     IF ¬ GENERATINGCFM THEN
  255.         _ShowWindow:    OPWORD    $A915
  256.     ELSE
  257.         IMPORT_CFM_FUNCTION    ShowWindow
  258.     ENDIF
  259.  
  260. ;
  261. ; pascal void ShowHide(WindowRef theWindow, Boolean showFlag)
  262. ;
  263.     IF ¬ GENERATINGCFM THEN
  264.         _ShowHide:    OPWORD    $A908
  265.     ELSE
  266.         IMPORT_CFM_FUNCTION    ShowHide
  267.     ENDIF
  268.  
  269. ;
  270. ; pascal void HiliteWindow(WindowRef theWindow, Boolean fHilite)
  271. ;
  272.     IF ¬ GENERATINGCFM THEN
  273.         _HiliteWindow:    OPWORD    $A91C
  274.     ELSE
  275.         IMPORT_CFM_FUNCTION    HiliteWindow
  276.     ENDIF
  277.  
  278. ;
  279. ; pascal void BringToFront(WindowRef theWindow)
  280. ;
  281.     IF ¬ GENERATINGCFM THEN
  282.         _BringToFront:    OPWORD    $A920
  283.     ELSE
  284.         IMPORT_CFM_FUNCTION    BringToFront
  285.     ENDIF
  286.  
  287. ;
  288. ; pascal void SendBehind(WindowRef theWindow, WindowRef behindWindow)
  289. ;
  290.     IF ¬ GENERATINGCFM THEN
  291.         _SendBehind:    OPWORD    $A921
  292.     ELSE
  293.         IMPORT_CFM_FUNCTION    SendBehind
  294.     ENDIF
  295.  
  296. ;
  297. ; pascal WindowRef FrontWindow(void)
  298. ;
  299.     IF ¬ GENERATINGCFM THEN
  300.         _FrontWindow:    OPWORD    $A924
  301.     ELSE
  302.         IMPORT_CFM_FUNCTION    FrontWindow
  303.     ENDIF
  304.  
  305. ;
  306. ; pascal void DrawGrowIcon(WindowRef theWindow)
  307. ;
  308.     IF ¬ GENERATINGCFM THEN
  309.         _DrawGrowIcon:    OPWORD    $A904
  310.     ELSE
  311.         IMPORT_CFM_FUNCTION    DrawGrowIcon
  312.     ENDIF
  313.  
  314. ;
  315. ; pascal void MoveWindow(WindowRef theWindow, short hGlobal, short vGlobal, Boolean front)
  316. ;
  317.     IF ¬ GENERATINGCFM THEN
  318.         _MoveWindow:    OPWORD    $A91B
  319.     ELSE
  320.         IMPORT_CFM_FUNCTION    MoveWindow
  321.     ENDIF
  322.  
  323. ;
  324. ; pascal void SizeWindow(WindowRef theWindow, short w, short h, Boolean fUpdate)
  325. ;
  326.     IF ¬ GENERATINGCFM THEN
  327.         _SizeWindow:    OPWORD    $A91D
  328.     ELSE
  329.         IMPORT_CFM_FUNCTION    SizeWindow
  330.     ENDIF
  331.  
  332. ;
  333. ; pascal void ZoomWindow(WindowRef theWindow, short partCode, Boolean front)
  334. ;
  335.     IF ¬ GENERATINGCFM THEN
  336.         _ZoomWindow:    OPWORD    $A83A
  337.     ELSE
  338.         IMPORT_CFM_FUNCTION    ZoomWindow
  339.     ENDIF
  340.  
  341. ;
  342. ; pascal void InvalRect(const Rect *badRect)
  343. ;
  344.     IF ¬ GENERATINGCFM THEN
  345.         _InvalRect:    OPWORD    $A928
  346.     ELSE
  347.         IMPORT_CFM_FUNCTION    InvalRect
  348.     ENDIF
  349.  
  350. ;
  351. ; pascal void InvalRgn(RgnHandle badRgn)
  352. ;
  353.     IF ¬ GENERATINGCFM THEN
  354.         _InvalRgn:    OPWORD    $A927
  355.     ELSE
  356.         IMPORT_CFM_FUNCTION    InvalRgn
  357.     ENDIF
  358.  
  359. ;
  360. ; pascal void ValidRect(const Rect *goodRect)
  361. ;
  362.     IF ¬ GENERATINGCFM THEN
  363.         _ValidRect:    OPWORD    $A92A
  364.     ELSE
  365.         IMPORT_CFM_FUNCTION    ValidRect
  366.     ENDIF
  367.  
  368. ;
  369. ; pascal void ValidRgn(RgnHandle goodRgn)
  370. ;
  371.     IF ¬ GENERATINGCFM THEN
  372.         _ValidRgn:    OPWORD    $A929
  373.     ELSE
  374.         IMPORT_CFM_FUNCTION    ValidRgn
  375.     ENDIF
  376.  
  377. ;
  378. ; pascal void BeginUpdate(WindowRef theWindow)
  379. ;
  380.     IF ¬ GENERATINGCFM THEN
  381.         _BeginUpdate:    OPWORD    $A922
  382.     ELSE
  383.         IMPORT_CFM_FUNCTION    BeginUpdate
  384.     ENDIF
  385.  
  386. ;
  387. ; pascal void EndUpdate(WindowRef theWindow)
  388. ;
  389.     IF ¬ GENERATINGCFM THEN
  390.         _EndUpdate:    OPWORD    $A923
  391.     ELSE
  392.         IMPORT_CFM_FUNCTION    EndUpdate
  393.     ENDIF
  394.  
  395. ;
  396. ; pascal void SetWRefCon(WindowRef theWindow, long data)
  397. ;
  398.     IF ¬ GENERATINGCFM THEN
  399.         _SetWRefCon:    OPWORD    $A918
  400.     ELSE
  401.         IMPORT_CFM_FUNCTION    SetWRefCon
  402.     ENDIF
  403.  
  404. ;
  405. ; pascal long GetWRefCon(WindowRef theWindow)
  406. ;
  407.     IF ¬ GENERATINGCFM THEN
  408.         _GetWRefCon:    OPWORD    $A917
  409.     ELSE
  410.         IMPORT_CFM_FUNCTION    GetWRefCon
  411.     ENDIF
  412.  
  413. ;
  414. ; pascal void SetWindowPic(WindowRef theWindow, PicHandle pic)
  415. ;
  416.     IF ¬ GENERATINGCFM THEN
  417.         _SetWindowPic:    OPWORD    $A92E
  418.     ELSE
  419.         IMPORT_CFM_FUNCTION    SetWindowPic
  420.     ENDIF
  421.  
  422. ;
  423. ; pascal PicHandle GetWindowPic(WindowRef theWindow)
  424. ;
  425.     IF ¬ GENERATINGCFM THEN
  426.         _GetWindowPic:    OPWORD    $A92F
  427.     ELSE
  428.         IMPORT_CFM_FUNCTION    GetWindowPic
  429.     ENDIF
  430.  
  431. ;
  432. ; pascal Boolean CheckUpdate(EventRecord *theEvent)
  433. ;
  434.     IF ¬ GENERATINGCFM THEN
  435.         _CheckUpdate:    OPWORD    $A911
  436.     ELSE
  437.         IMPORT_CFM_FUNCTION    CheckUpdate
  438.     ENDIF
  439.  
  440. ;
  441. ; pascal void ClipAbove(WindowRef window)
  442. ;
  443.     IF ¬ GENERATINGCFM THEN
  444.         _ClipAbove:    OPWORD    $A90B
  445.     ELSE
  446.         IMPORT_CFM_FUNCTION    ClipAbove
  447.     ENDIF
  448.  
  449. ;
  450. ; pascal void SaveOld(WindowRef window)
  451. ;
  452.     IF ¬ GENERATINGCFM THEN
  453.         _SaveOld:    OPWORD    $A90E
  454.     ELSE
  455.         IMPORT_CFM_FUNCTION    SaveOld
  456.     ENDIF
  457.  
  458. ;
  459. ; pascal void DrawNew(WindowRef window, Boolean update)
  460. ;
  461.     IF ¬ GENERATINGCFM THEN
  462.         _DrawNew:    OPWORD    $A90F
  463.     ELSE
  464.         IMPORT_CFM_FUNCTION    DrawNew
  465.     ENDIF
  466.  
  467. ;
  468. ; pascal void PaintOne(WindowRef window, RgnHandle clobberedRgn)
  469. ;
  470.     IF ¬ GENERATINGCFM THEN
  471.         _PaintOne:    OPWORD    $A90C
  472.     ELSE
  473.         IMPORT_CFM_FUNCTION    PaintOne
  474.     ENDIF
  475.  
  476. ;
  477. ; pascal void PaintBehind(WindowRef startWindow, RgnHandle clobberedRgn)
  478. ;
  479.     IF ¬ GENERATINGCFM THEN
  480.         _PaintBehind:    OPWORD    $A90D
  481.     ELSE
  482.         IMPORT_CFM_FUNCTION    PaintBehind
  483.     ENDIF
  484.  
  485. ;
  486. ; pascal void CalcVis(WindowRef window)
  487. ;
  488.     IF ¬ GENERATINGCFM THEN
  489.         _CalcVis:    OPWORD    $A909
  490.     ELSE
  491.         IMPORT_CFM_FUNCTION    CalcVis
  492.     ENDIF
  493.  
  494. ;
  495. ; pascal void CalcVisBehind(WindowRef startWindow, RgnHandle clobberedRgn)
  496. ;
  497.     IF ¬ GENERATINGCFM THEN
  498.         _CalcVisBehind:    OPWORD    $A90A
  499.     ELSE
  500.         IMPORT_CFM_FUNCTION    CalcVisBehind
  501.     ENDIF
  502.  
  503. ;
  504. ; pascal long GrowWindow(WindowRef theWindow, Point startPt, const Rect *bBox)
  505. ;
  506.     IF ¬ GENERATINGCFM THEN
  507.         _GrowWindow:    OPWORD    $A92B
  508.     ELSE
  509.         IMPORT_CFM_FUNCTION    GrowWindow
  510.     ENDIF
  511.  
  512. ;
  513. ; pascal short FindWindow(Point thePoint, WindowRef *theWindow)
  514. ;
  515.     IF ¬ GENERATINGCFM THEN
  516.         _FindWindow:    OPWORD    $A92C
  517.     ELSE
  518.         IMPORT_CFM_FUNCTION    FindWindow
  519.     ENDIF
  520.  
  521. ;
  522. ; pascal long PinRect(const Rect *theRect, Point thePt)
  523. ;
  524.     IF ¬ GENERATINGCFM THEN
  525.         _PinRect:    OPWORD    $A94E
  526.     ELSE
  527.         IMPORT_CFM_FUNCTION    PinRect
  528.     ENDIF
  529.  
  530. ;
  531. ; pascal long DragGrayRgn(RgnHandle theRgn, Point startPt, const Rect *limitRect, const Rect *slopRect, short axis, DragGrayRgnUPP actionProc)
  532. ;
  533.     IF ¬ GENERATINGCFM THEN
  534.         _DragGrayRgn:    OPWORD    $A905
  535.     ELSE
  536.         IMPORT_CFM_FUNCTION    DragGrayRgn
  537.     ENDIF
  538.  
  539. ;
  540. ; pascal long DragTheRgn(RgnHandle theRgn, Point startPt, const Rect *limitRect, const Rect *slopRect, short axis, DragGrayRgnUPP actionProc)
  541. ;
  542.     IF ¬ GENERATINGCFM THEN
  543.         _DragTheRgn:    OPWORD    $A926
  544.     ELSE
  545.         IMPORT_CFM_FUNCTION    DragTheRgn
  546.     ENDIF
  547.  
  548. ;
  549. ; pascal Boolean TrackBox(WindowRef theWindow, Point thePt, short partCode)
  550. ;
  551.     IF ¬ GENERATINGCFM THEN
  552.         _TrackBox:    OPWORD    $A83B
  553.     ELSE
  554.         IMPORT_CFM_FUNCTION    TrackBox
  555.     ENDIF
  556.  
  557. ;
  558. ; pascal void GetCWMgrPort(CGrafPtr *wMgrCPort)
  559. ;
  560.     IF ¬ GENERATINGCFM THEN
  561.         _GetCWMgrPort:    OPWORD    $AA48
  562.     ELSE
  563.         IMPORT_CFM_FUNCTION    GetCWMgrPort
  564.     ENDIF
  565.  
  566. ;
  567. ; pascal void SetWinColor(WindowRef theWindow, WCTabHandle newColorTable)
  568. ;
  569.     IF ¬ GENERATINGCFM THEN
  570.         _SetWinColor:    OPWORD    $AA41
  571.     ELSE
  572.         IMPORT_CFM_FUNCTION    SetWinColor
  573.     ENDIF
  574.  
  575. ;
  576. ; pascal void SetDeskCPat(PixPatHandle deskPixPat)
  577. ;
  578.     IF ¬ GENERATINGCFM THEN
  579.         _SetDeskCPat:    OPWORD    $AA47
  580.     ELSE
  581.         IMPORT_CFM_FUNCTION    SetDeskCPat
  582.     ENDIF
  583.  
  584. ;
  585. ; pascal WindowRef NewCWindow(void *wStorage, const Rect *boundsRect, ConstStr255Param title, Boolean visible, short procID, WindowRef behind, Boolean goAwayFlag, long refCon)
  586. ;
  587.     IF ¬ GENERATINGCFM THEN
  588.         _NewCWindow:    OPWORD    $AA45
  589.     ELSE
  590.         IMPORT_CFM_FUNCTION    NewCWindow
  591.     ENDIF
  592.  
  593. ;
  594. ; pascal WindowRef GetNewCWindow(short windowID, void *wStorage, WindowRef behind)
  595. ;
  596.     IF ¬ GENERATINGCFM THEN
  597.         _GetNewCWindow:    OPWORD    $AA46
  598.     ELSE
  599.         IMPORT_CFM_FUNCTION    GetNewCWindow
  600.     ENDIF
  601.  
  602. ;
  603. ; pascal short GetWVariant(WindowRef theWindow)
  604. ;
  605.     IF ¬ GENERATINGCFM THEN
  606.         _GetWVariant:    OPWORD    $A80A
  607.     ELSE
  608.         IMPORT_CFM_FUNCTION    GetWVariant
  609.     ENDIF
  610.  
  611. ;
  612. ; pascal void SetWTitle(WindowRef theWindow, ConstStr255Param title)
  613. ;
  614.     IF ¬ GENERATINGCFM THEN
  615.         _SetWTitle:    OPWORD    $A91A
  616.     ELSE
  617.         IMPORT_CFM_FUNCTION    SetWTitle
  618.     ENDIF
  619.  
  620. ;
  621. ; pascal Boolean TrackGoAway(WindowRef theWindow, Point thePt)
  622. ;
  623.     IF ¬ GENERATINGCFM THEN
  624.         _TrackGoAway:    OPWORD    $A91E
  625.     ELSE
  626.         IMPORT_CFM_FUNCTION    TrackGoAway
  627.     ENDIF
  628.  
  629. ;
  630. ; pascal void DragWindow(WindowRef theWindow, Point startPt, const Rect *boundsRect)
  631. ;
  632.     IF ¬ GENERATINGCFM THEN
  633.         _DragWindow:    OPWORD    $A925
  634.     ELSE
  635.         IMPORT_CFM_FUNCTION    DragWindow
  636.     ENDIF
  637.  
  638.     IF ¬ STRICT_WINDOWS  THEN
  639. ; typedef struct WindowRecord  WindowRecord
  640. ; typedef WindowRecord         *WindowPeek
  641. WindowRecord             RECORD    0
  642. port                     ds     GrafPort ; offset: $0 (0)
  643. windowKind                 ds.w   1        ; offset: $6C (108)
  644. visible                     ds.b   1        ; offset: $6E (110)
  645. hilited                     ds.b   1        ; offset: $6F (111)
  646. goAwayFlag                 ds.b   1        ; offset: $70 (112)
  647. spareFlag                 ds.b   1        ; offset: $71 (113)
  648. strucRgn                 ds.l   1        ; offset: $72 (114)
  649. contRgn                     ds.l   1        ; offset: $76 (118)
  650. updateRgn                 ds.l   1        ; offset: $7A (122)
  651. windowDefProc             ds.l   1        ; offset: $7E (126)
  652. dataHandle                 ds.l   1        ; offset: $82 (130)
  653. titleHandle                 ds.l   1        ; offset: $86 (134)
  654. titleWidth                 ds.w   1        ; offset: $8A (138)
  655. controlList                 ds.l   1        ; offset: $8C (140)
  656. nextWindow                 ds.l   1        ; offset: $90 (144)
  657. windowPic                 ds.l   1        ; offset: $94 (148)
  658. refCon                     ds.l   1        ; offset: $98 (152)
  659. sizeof                     EQU *            ; size:   $9C (156)
  660.                         ENDR
  661.  
  662. ; typedef struct CWindowRecord  CWindowRecord
  663. ; typedef CWindowRecord     *CWindowPeek
  664. CWindowRecord             RECORD    0
  665. port                     ds     CGrafPort ; offset: $0 (0)
  666. windowKind                 ds.w   1        ; offset: $6C (108)
  667. visible                     ds.b   1        ; offset: $6E (110)
  668. hilited                     ds.b   1        ; offset: $6F (111)
  669. goAwayFlag                 ds.b   1        ; offset: $70 (112)
  670. spareFlag                 ds.b   1        ; offset: $71 (113)
  671. strucRgn                 ds.l   1        ; offset: $72 (114)
  672. contRgn                     ds.l   1        ; offset: $76 (118)
  673. updateRgn                 ds.l   1        ; offset: $7A (122)
  674. windowDefProc             ds.l   1        ; offset: $7E (126)
  675. dataHandle                 ds.l   1        ; offset: $82 (130)
  676. titleHandle                 ds.l   1        ; offset: $86 (134)
  677. titleWidth                 ds.w   1        ; offset: $8A (138)
  678. controlList                 ds.l   1        ; offset: $8C (140)
  679. nextWindow                 ds.l   1        ; offset: $90 (144)
  680. windowPic                 ds.l   1        ; offset: $94 (148)
  681. refCon                     ds.l   1        ; offset: $98 (152)
  682. sizeof                     EQU *            ; size:   $9C (156)
  683.                         ENDR
  684.  
  685. WStateData                 RECORD    0
  686. userState                 ds     Rect    ; offset: $0 (0)        ;user state
  687. stdState                 ds     Rect    ; offset: $8 (8)        ;standard state
  688. sizeof                     EQU *            ; size:   $10 (16)
  689.                         ENDR
  690.  
  691. ; typedef struct WStateData  WStateData
  692. ; typedef WStateData         *WStateDataPtr, **WStateDataHandle
  693. ; typedef struct AuxWinRec     AuxWinRec
  694. ; typedef AuxWinRec         *AuxWinPtr, **AuxWinHandle
  695. AuxWinRec                 RECORD    0
  696. awNext                     ds.l   1        ; offset: $0 (0)        ;handle to next AuxWinRec
  697. awOwner                     ds.l   1        ; offset: $4 (4)        ;ptr to window 
  698. awCTable                 ds.l   1        ; offset: $8 (8)        ;color table for this window
  699. reserved                 ds.l   1        ; offset: $C (12)        ;  
  700. awFlags                     ds.l   1        ; offset: $10 (16)        ;reserved for expansion
  701. awReserved                 ds.l   1        ; offset: $14 (20)        ;reserved for expansion
  702. awRefCon                 ds.l   1        ; offset: $18 (24)        ;user Constant
  703. sizeof                     EQU *            ; size:   $1C (28)
  704.                         ENDR
  705.  
  706. ;
  707. ; pascal Boolean GetAuxWin(WindowRef theWindow, AuxWinHandle *awHndl)
  708. ;
  709.     IF ¬ GENERATINGCFM THEN
  710.         _GetAuxWin:    OPWORD    $AA42
  711.     ELSE
  712.         IMPORT_CFM_FUNCTION    GetAuxWin
  713.     ENDIF
  714.  
  715.  
  716. wContentColor                    EQU        0
  717. wFrameColor                        EQU        1
  718. wTextColor                        EQU        2
  719. wHiliteColor                    EQU        3
  720. wTitleBarColor                    EQU        4
  721.  
  722.     ENDIF
  723.     ENDIF ; __WINDOWS__
  724.